From: Eli Zaretskii <eliz@gnu.org>
Date: Sun, 5 May 2024 16:30:57 +0000 (+0300)
Subject: Fix lock files on some versions of Cygwin
X-Git-Tag: archive/raspbian/1%30.1+1-3+rpi1^2~14^2~18^2~1640
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=d5b6627faa9bbd0059600a91d1cd45c0b31e3cd8;p=emacs.git

Fix lock files on some versions of Cygwin

* src/filelock.c (current_lock_owner): Support negative boot-time
on rare systems.  (Bug#70415)
---

diff --git a/src/filelock.c b/src/filelock.c
index 01d35c46726..e5b352cb6ff 100644
--- a/src/filelock.c
+++ b/src/filelock.c
@@ -419,7 +419,9 @@ current_lock_owner (lock_info_type *owner, Lisp_Object lfname)
       boot += 2;
       FALLTHROUGH;
     case ':':
-      if (! c_isdigit (boot[0]))
+      if (!(c_isdigit (boot[0])
+	    /* A negative number.  */
+	    || (boot[0] == '-' && c_isdigit (boot[1]))))
 	return EINVAL;
       boot_time = strtoimax (boot, &lfinfo_end, 10);
       break;